home *** CD-ROM | disk | FTP | other *** search
/ Virtual Sex With Nikki Tyler / Virtual Sex with Nikki Tyler.iso / pc / nikki.dxr / Internal_15.ls < prev    next >
Encoding:
Text File  |  1999-06-27  |  1.7 KB  |  66 lines
  1. global gIntroPlayed, gQuinSprite, gOldQuinCast, gMovieSprite, gParticipate, gStaring, gAutomated, gNew, gPlaying, gTalk, gFullScreenOrigClass, gPrepBypass, gNew2, gSliderSprite, gFullScreen
  2.  
  3. on sexButton whichButton
  4.   case legalButton(whichButton) of
  5.     0:
  6.       exit
  7.   end case
  8.   case QT(gMovieSprite) of
  9.     0:
  10.       exit
  11.   end case
  12.   setMovieRate(0.0)
  13.   updateStage()
  14.   storeStopTime(-1, 1, 35)
  15.   puppetSprite(47, 0)
  16.   gStaring = 0
  17.   gAutomated = 0
  18.   swapPlaybackScreen("playback dot", 1)
  19.   sprite(21).visible = 1
  20.   sprite(22).visible = 1
  21.   sprite(32).visible = 1
  22.   puppetSprite(21, 0)
  23.   puppetSprite(22, 0)
  24.   puppetSprite(24, 0)
  25.   puppetSprite(25, 0)
  26.   puppetSprite(26, 0)
  27.   whichClass = class()
  28.   randomList = [9]
  29.   case whichClass of
  30.     1:
  31.       returnSlider()
  32.       whichvisible = getAt(gParticipate, 2)
  33.       setProp(11, 12, "visible", whichvisible)
  34.       setProp(24, 26, "visible", whichvisible)
  35.       case gIntroPlayed of
  36.         0:
  37.           randomList = [2, 3, 4, 5, 6, 7]
  38.       end case
  39.       resetQuin()
  40.       updateGOldMovie(1)
  41.     otherwise:
  42.       gNew2 = 0
  43.       whichvisible = getAt(gParticipate, 1)
  44.       setProp(11, 12, "visible", whichvisible)
  45.       setProp(24, 26, "visible", whichvisible)
  46.       whichCast = the castNum of sprite gQuinSprite
  47.       if whichCast > 0 then
  48.         gOldQuinCast = whichCast
  49.       end if
  50.       puppetSprite(gQuinSprite, 0)
  51.       go("1.0" & the frame >= label("FullScreen"))
  52.       updateGOldMovie(2)
  53.   end case
  54.   sprite(33).visible = 1
  55.   sprite(34).visible = 1
  56.   if gFullScreen < 1 then
  57.     maxCount = count(randomList)
  58.     whichPhrase = getAt(randomList, random(maxCount))
  59.     talk(whichPhrase, 0, #noTransition)
  60.   end if
  61.   gPlaying = 1
  62.   gIntroPlayed = 1
  63.   sprite(gSliderSprite).visible = 1
  64.   prepBypass()
  65. end
  66.